﻿''' <summary>
''' 程序信息类，对应表S_App
''' </summary>
Public Class ClsApp

    Private mAppId As Integer
    Private mAppName As String
    Private mAppVerSion As String
    Private mAppCompany As String
    Private mAppWebUrl As String
    Private mAppEmail As String
    Private mAppMemo As String
    Private mAppPubTime As Date
    Private mAppType As String
    Private mAppExpire As Date
    Private mAppRegisted As Boolean
    Private mAppRegCode As String

    Public Property AppName As String
        Get
            Return mAppName
        End Get
        Set(value As String)
            mAppName = value
        End Set
    End Property

    Public Property AppVerSion As String
        Get
            Return mAppVerSion
        End Get
        Set(value As String)
            mAppVerSion = value
        End Set
    End Property

    Public Property AppCompany As String
        Get
            Return mAppCompany
        End Get
        Set(value As String)
            mAppCompany = value
        End Set
    End Property

    Public Property AppWebUrl As String
        Get
            Return mAppWebUrl
        End Get
        Set(value As String)
            mAppWebUrl = value
        End Set
    End Property

    Public Property AppEmail As String
        Get
            Return mAppEmail
        End Get
        Set(value As String)
            mAppEmail = value
        End Set
    End Property

    Public Property AppMemo As String
        Get
            Return mAppMemo
        End Get
        Set(value As String)
            mAppMemo = value
        End Set
    End Property

    Public Property AppPubTime As Date
        Get
            Return mAppPubTime
        End Get
        Set(value As Date)
            mAppPubTime = value
        End Set
    End Property

    Public Property AppType As String
        Get
            Return mAppType
        End Get
        Set(value As String)
            mAppType = value
        End Set
    End Property

    Public Property AppExpire As Date
        Get
            Return mAppExpire
        End Get
        Set(value As Date)
            mAppExpire = value
        End Set
    End Property

    Public Property AppRegisted As Boolean
        Get
            Return mAppRegisted
        End Get
        Set(value As Boolean)
            mAppRegisted = value
        End Set
    End Property

    Public Property AppRegCode As String
        Get
            Return mAppRegCode
        End Get
        Set(value As String)
            mAppRegCode = value
        End Set
    End Property

    Public Property AppId As Integer
        Get
            Return mAppId
        End Get
        Set(value As Integer)
            mAppId = value
        End Set
    End Property
End Class
